<!--#Include File="LoginCheck.asp"-->
<!--#Include File="Conn.asp"-->
<%
	Dim Col,Val
	Col = Request("Col")
	Val = Request("Val")
	StartDate = Request("StartDate")
	EndDate = Request("EndDate")

	set cmdObject = Server.CreateObject("ADODB.Command")
    with cmdObject
        .ActiveConnection = Conn         
        .CommandText      = "[GetSummaryByNameAndVal-03]"  
        .CommandType      = 4            
        .Prepared         = true
	    .Parameters.append .CreateParameter("@Col ",200,1,50,Col)
		.Parameters.append .CreateParameter("@Val ",200,1,50,Val)
		.Parameters.append .CreateParameter("@StartDate ",200,1,50,StartDate)
		.Parameters.append .CreateParameter("@EndDate ",200,1,50,EndDate)
        set rs = .Execute
    end with
    set cmdObject=nothing
	If rs.BOF And rs.EOF Then
		Response.Write("0")
	Else
		Response.Write(rs("Num"))
	End If
	set rs = nothing
%>